home *** CD-ROM | disk | FTP | other *** search
/ IRIX Base Documentation 2002 November / SGI IRIX Base Documentation 2002 November.iso / usr / share / catman / p_man / cat3 / f90 / uscctc.z / uscctc
Encoding:
Text File  |  2002-10-03  |  4.1 KB  |  90 lines
  1. USCCTC(3F)                                            Last changed: 1-22-99
  2.  
  3.  
  4. NNAAMMEE
  5.      UUSSCCCCTTCC, UUSSCCCCTTII - Converts EBCDIC character data to ASCII character
  6.      data, and vice versa
  7.  
  8. SSYYNNOOPPSSIISS
  9.      CCAALLLL UUSSCCCCTTCC ((_s_r_c,, _i_s_b,, _d_e_s_t,, _n_u_m,, _n_p_w [[,,_v_a_l]]))
  10.  
  11.      CCAALLLL UUSSCCCCTTII ((_s_r_c,, _d_e_s_t,, _i_s_b,, _n_u_m,, _n_p_w [[,,_v_a_l]]))
  12.  
  13. IIMMPPLLEEMMEENNTTAATTIIOONN
  14.      UNICOS, UNICOS/mk, and IRIX systems
  15.  
  16. DDEESSCCRRIIPPTTIIOONN
  17.      On IRIX systems, this routine is in lliibbffffiioo..ssoo which is linked by
  18.      default when compiling programs with the MIPSpro 7 Fortran 90 compiler
  19.      or when compiling programs with the --ccrraayylliibbss option to the MIPSpro
  20.      F77 compiler.
  21.  
  22.      UUSSCCCCTTCC converts EBCDIC character data to ASCII character data.  UUSSCCCCTTII
  23.      converts ASCII character data to EBCDIC character data.  All
  24.      non-printing characters are converted to blanks.
  25.  
  26.      When using the CF90 compiler or MIPSpro 7 Fortran 90 compiler on
  27.      UNICOS, UNICOS/mk, or IRIX, the arguments must be of type integer with
  28.      KKIINNDD==88.
  29.  
  30.      The following is a list of valid arguments for this routine.
  31.  
  32.      _s_r_c       Variable or array of any type (except CHARACTER) containing
  33.                the character data to be converted.
  34.  
  35.      _i_s_b       An integer variable or constant containing the starting byte
  36.                offset to begin the data conversion.  Bytes are numbered
  37.                from left to right, with the leftmost byte as byte 1.  The
  38.                _i_s_b argument applies to the _s_r_c (UUSSCCCCTTCC) or _d_e_s_t (UUSSCCCCTTII)
  39.                argument.
  40.  
  41.      _d_e_s_t      Variable or array of any type (except CHARACTER) to receive
  42.                the character data to be converted.
  43.  
  44.      _n_u_m       An integer variable or constant containing the number of
  45.                characters to be converted.
  46.  
  47.      _n_p_w       An integer variable or constant containing the number of
  48.                characters to be placed in each word of _d_e_s_t (UUSSCCCCTTCC) or
  49.                obtained from each word of _s_r_c (UUSSCCCCTTII).  A positive value
  50.                for _n_p_w (1 to 8) indicates left-justification.  A negative
  51.                value (-1 to -8) indicates right-justification.  For UUSSCCCCTTCC,
  52.                left-justified output is also blank-filled.  Note that _n_p_w
  53.                values of 8 and -8 are equivalent.
  54.  
  55.      _v_a_l       An optional integer or logical variable or constant which,
  56.                if specified and nonzero (.TRUE.), indicates that all lower
  57.                case input is to be folded to upper case output.  The
  58.                default, if the argument is not specified, is no case
  59.                folding.
  60.  
  61. NNOOTTEESS
  62.      The following conditions must be met for any character data to be
  63.      converted:
  64.           _n_u_m >= 0
  65.           _i_s_b > 0
  66.           0 < |_n_p_w| < 9
  67.  
  68.      If _n_u_m is not an even multiple of 8, the UUSSCCCCTTII routine will place the
  69.      remaining converted characters in the final word of _d_e_s_t while
  70.      preserving the rest of the original contents of the word.
  71.  
  72. CCAAUUTTIIOONNSS
  73.      The same variable or array can be specified for _s_r_c (input) and _d_e_s_t
  74.      (output) if and only if _i_s_b is 1 and _n_p_w is 8 (or -8).  The results of
  75.      overlapping conversions using any other values for _i_s_b and _n_p_w are
  76.      undefined.
  77.  
  78. EEXXAAMMPPLLEESS
  79.      The following Fortran code converts 800 characters from EBCDIC to
  80.      ASCII.  The ASCII characters are placed one per word, right-justified.
  81.  
  82.           INTEGER EBCDIC(100)
  83.           INTEGER ASCII (800)
  84.  
  85.           CALL USCCTC(EBCDIC, 1, ASCII, 800, -1, .FALSE.)
  86.  
  87. SSEEEE AALLSSOO
  88.      _A_p_p_l_i_c_a_t_i_o_n _P_r_o_g_r_a_m_m_e_r'_s _L_i_b_r_a_r_y _R_e_f_e_r_e_n_c_e _M_a_n_u_a_l for the printed
  89.      version of this man page.
  90.